home *** CD-ROM | disk | FTP | other *** search
/ Power Utilities / Power Utilities.iso / utility / pro211 / gifv.slq < prev    next >
Encoding:
Text File  |  1993-10-06  |  1.8 KB  |  65 lines
  1. ;
  2. ; GIFV.SLQ
  3. ; This script shows how to use the IFBMP, IFGIF, IFPCX and ENTER
  4. ; commands.
  5. ;
  6. ; The PRINTER, PRINTER-ON, PRINTER-OFF and PRINTER-FF commands are
  7. ; used here.
  8. ;
  9. ; All files in the current directory will be checked against the 3
  10. ; different supported extensions. Depending on the file type, a
  11. ; different counter will be incremented. At the end all three
  12. ; counters will be display showing how many of each type of file
  13. ; you have!
  14. ;
  15.         system cls
  16.         echo Please wait while reading file info...
  17.         change-path *.*
  18.         set    v1 0
  19.         set    v2 0
  20.         set    v3 0
  21.         set    v4 0
  22. :toploop
  23.         ifbmp       :dobmp
  24.         ifgif       :dogif
  25.         ifpcx       :dopcx
  26.         echo File "%file_name%" is NOT a supported graphics file!
  27.         goto        :doloop
  28. :dobmp
  29.         set v1 +
  30.         goto        :doloop
  31. :dogif
  32.         set v2 +
  33.         goto        :doloop
  34. :dopcx
  35.         set v3 +
  36.         goto        :doloop
  37. :doloop
  38.         set v4 +
  39.         skipnext    :exit
  40.         goto        :toploop
  41. :exit
  42.         printer-on
  43.         echo Total files processed is displayed below
  44.         display  V4
  45.         echo The number of BMP files is displayed below
  46.         display  v1
  47.         echo The number of GIF files is displayed below
  48.         display  v2
  49.         echo The number of PCX files is displayed below
  50.         display  v3
  51.         printer-ff
  52.  
  53.         printer report.prn
  54.         echo Total files processed is displayed below
  55.         display  V4
  56.         echo The number of BMP files is displayed below
  57.         display  v1
  58.         echo The number of GIF files is displayed below
  59.         display  v2
  60.         echo The number of PCX files is displayed below
  61.         display  v3
  62.         printer-off
  63.         ENTER
  64.  
  65.